home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-06 / logcopy.zip / SETGRAPH.INT < prev    next >
Text File  |  1992-08-03  |  926b  |  22 lines

  1. INTERFACE;
  2.  
  3.   UNIT SETGRAPH( gotoxy, scroll_screen_up );
  4.  
  5.  
  6. (**********************************************************************)
  7. (*                                                                    *)
  8. (*      GOTOXY  -  Set cursor on screen at passed location            *)
  9. (*                                                                    *)
  10. (*      GOTOXY(  row :integer     - row and column where              *)
  11. (*               col :integer )   - cursor is to be moved             *)
  12. (*                                                                    *)
  13. (*      Returned        :nothing                                      *)
  14. (*                                                                    *)
  15. (**********************************************************************)
  16.  
  17.  Procedure gotoxy( ROW,COL : Integer);
  18.  
  19.  Procedure scroll_screen_up( nlines,ulr,ulc,lrr,lrc,attr: Integer);
  20.  
  21. END;
  22.